home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 1997 January / inter@ivo 1997-01.iso / cybint12 / bin / para.dxr / 00020.ls < prev    next >
Encoding:
Text File  |  1996-12-14  |  415 b   |  24 lines
  1. on exitFrame
  2.   global act
  3.   if act = 0 then
  4.     if rollOver(5) or rollOver(22) or rollOver(23) then
  5.       cursor([901, 902])
  6.     else
  7.       HotSpots(2, 3)
  8.     end if
  9.     if rollOver(5) or rollOver(3) then
  10.       Loopframe()
  11.     else
  12.       go(21)
  13.     end if
  14.   end if
  15.   if act = 1 then
  16.     if rollOver(25) or rollOver(26) then
  17.       cursor([901, 902])
  18.     else
  19.       cursor(-1)
  20.     end if
  21.     Loopframe()
  22.   end if
  23. end
  24.